home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / lists / mint / l_1199 / 1073 < prev    next >
Encoding:
Internet Message Format  |  1994-08-27  |  7.8 KB
  1. Subject: Re: MiNT 1.10 biosfs select() patch
  2. Date: Sat, 19 Feb 94 1:46:32 CET
  3. From: Juergen Lock <nox@jelal.north.de>
  4. In-Reply-To: <199402172223.AA06552@techfac.TechFak.Uni-Bielefeld.DE>; from "Torsten Scherer" at Feb 17, 94 11:13 pm
  5. Message-Id: <9402190046.AA00186@jelal.north.de>
  6.  
  7. Torsten Scherer writes:
  8.  
  9. >  Ok, forget what I was telling some hours ago. The chunks came from the vcon
  10. > daemon from Juergen Lock.
  11.  
  12.  yea because its select never woke up before timeout...
  13.  
  14. >  Without the vcons, it doesn't work at all!
  15.  
  16.  aah so they are at least useful for something. ;)
  17.  
  18. > Looks like you can still read characters from /dev/console, but select
  19. > doesn't work any longer. When tracking this down, I found this:
  20. > 
  21. > diff -u3 orig/biosfs.c ./biosfs.c
  22. > --- orig/biosfs.c    Thu Feb 17 16:55:00 1994
  23. > +++ ./biosfs.c    Thu Feb 17 23:04:10 1994
  24. > @@ -1542,7 +1542,7 @@
  25. >          }
  26. >          if (tty) {
  27. >          /* avoid collisions with other processes */
  28. > -            if (!tty->rsel)
  29. > +            if (tty->rsel)
  30. >                  return 2;    /* collision */
  31. >              tty->rsel = p;
  32. >          }
  33. > @@ -1553,7 +1553,7 @@
  34. >              return 1;
  35. >          }
  36. >          if (tty) {
  37. > -            if (!tty->wsel)
  38. > +            if (tty->wsel)
  39. >                  return 2;    /* collision */
  40. >              tty->wsel = p;
  41. >          }
  42.  
  43.  thats number one...
  44.  
  45. 2.
  46. intr.spp: ++nox@jelal.north.de
  47.     Check for auto-repeating keys so that Fselect() wakes up more
  48.     quickly.
  49.  
  50. this was the wrong patch, the right one came a few days later...
  51.  
  52. Index: intr.spp
  53. @@ -60,9 +60,6 @@
  54.      move.l    _old_timer+8,-(sp)    ; jump to GEMDOS time vector
  55.      rts
  56.  
  57. -    XREF    _kintr
  58. -    XREF    _keyrec
  59. -
  60.  _mint_vbl:
  61.  %ifndef ONLY030
  62.      tst.w    ($59e).w        ; test longframe (AKP)
  63. @@ -76,11 +73,6 @@
  64.      rts
  65.  
  66.  L_comeback:
  67. -    move.w    d0,-(sp)        ; `repeated' keys don't generate
  68. -    move.w    _keyrec+8,d0        ; interrupts...  check buffer and
  69. -    cmp.w    _keyrec+6,d0        ; set hi byte of kintr so that
  70. -    sne    _kintr            ; select can wake up before you
  71. -    move.w    (sp)+,d0        ; release the key, etc.
  72.      tst.w    _proc_clock        ; has time expired yet?
  73.      beq.s    L_expired        ; yes -- maybe go switch processes
  74.  L_out:
  75. Index: timeout.c
  76. @@ -140,6 +140,10 @@
  77.   * suspends the current process
  78.   */
  79.  
  80. +/* variables for monitoring the keyboard */
  81. +extern IOREC_T    *keyrec;    /* keyboard i/o record pointer */
  82. +extern short    kintr;        /* keyboard interrupt pending (see intr.s) */
  83. +
  84.  volatile int our_clock = 1000;
  85.  
  86.  void ARGS_ON_STACK
  87. @@ -147,6 +151,8 @@
  88.  {
  89.      int ms;        /* time between ticks */
  90.  
  91. +    *(char *)&kintr = (keyrec->head != keyrec->tail) ? -1 : 0;
  92. +
  93.      ms = *((short *)0x442L);
  94.      if (proc_clock > 0)
  95.          proc_clock--;
  96.  
  97. 3. (another select patch, not fatal)
  98.  
  99. Index: fasttext.c
  100. @@ -1379,8 +1379,9 @@
  101.          }
  102.          if (tty) {
  103.          /* avoid collisions with other processes */
  104. -            if (!tty->rsel)
  105. -                tty->rsel = p;
  106. +            if (tty->rsel)
  107. +                return 2;
  108. +            tty->rsel = p;
  109.          }
  110.          return 0;
  111.      } else if (mode == O_WRONLY) {
  112.  
  113. 4.
  114. debug.c: ++nox@jelal.north.de
  115.     Make only ctrl-alt-key characters significant to the
  116.     debug code (before, any character could start/stop output).
  117.  
  118. without this non-ctrl-alt keys were still eaten:
  119.  
  120. Index: debug.c
  121. @@ -271,6 +271,7 @@
  122.              do_func_key(scan);
  123.              goto ptoggle;
  124.              }
  125. +            else goto cont;
  126.          }
  127.          else {
  128.              key = Bconin(out_device);
  129. @@ -288,6 +289,7 @@
  130.          }
  131.          }
  132.      }
  133. +cont:
  134.      s++;
  135.      }
  136.  }
  137.  
  138. 5. entropys zeroed-tty-pgroup fix...
  139.  
  140. Index: dosmem.c
  141. @@ -748,6 +748,7 @@
  142.          }
  143.      }
  144.  
  145. +#if 0
  146.  /* release the controlling terminal, if we're a process group leader */
  147.      fp = curproc->handle[-1];
  148.      if (fp && is_terminal(fp) && curproc->pgrp == curproc->pid) {
  149. @@ -755,6 +756,7 @@
  150.          if (curproc->pgrp == tty->pgrp)
  151.              tty->pgrp = 0;
  152.      }
  153. +#endif
  154.  
  155.  /* close all files */
  156.      for (i = MIN_HANDLE; i < MAX_OPEN; i++) {
  157.  
  158. 6. and some older ones...
  159.  
  160. diff -uw ../fasttext.c ./fasttext.c
  161. --- ./fasttext.c    Thu Jun 24 20:36:16 1993
  162. +++ ./fasttext.c    Sat Jun 26 02:09:56 1993
  163. @@ -1058,7 +1058,15 @@
  164.      SCREEN *v;
  165.      int c;
  166.  {
  167. +#if 0
  168.      gotoxy(v, c - ' ', escy1 - ' ');
  169. +#else
  170. +    /* some (un*x) termcaps seem to always set the hi bit on
  171. +       cm args (cm=\EY%+ %+ :) -> drop that unless the screen
  172. +       is bigger.    -nox
  173. +    */
  174. +    gotoxy(v, (c - ' ') & (v->maxx|0x7f), (escy1 - ' ') & (v->maxy|0x7f));
  175. +#endif
  176.      state = normal_putch;
  177.  }
  178.  
  179. diff -uw ../intr.spp ./intr.spp
  180. --- ./intr.spp    Sat Jun 26 01:08:18 1993
  181. +++ ./intr.spp    Sat Jun 26 01:20:54 1993
  182. @@ -272,6 +272,10 @@
  183.      move.l    _sig_routine,a1        ; get handler
  184.      jsr    (a1)            ; go do it
  185.      movem.l    (sp)+,d0-d2/a0-a2
  186. +; 68000 processor bug: rte right after movem can eat interrupts...
  187. +%ifndef ONLY030
  188. +    nop
  189. +%endif
  190.      rte
  191.  
  192.  ;
  193.  
  194. including our neverending story...  the 1.10 version of the select-xkey fix. :)
  195.  
  196. Index: console.c
  197. @@ -8,6 +8,8 @@
  198.  
  199.  #include "mint.h"
  200.  
  201. +extern char vt52xkey[];
  202. +
  203.  /*
  204.   * These routines are what Cconout, Cauxout, etc. ultimately call.
  205.   * They take an integer argument which is the user's file handle,
  206. @@ -28,6 +30,14 @@
  207.      }
  208.      r = 1;        /* default is to assume input waiting (e.g. TOS files)*/
  209.      (void)(*f->dev->ioctl)(f, FIONREAD, &r);
  210. +
  211. +    if (!r && is_terminal(f)) {
  212. +        struct tty *tty = (struct tty *)f->devinfo;
  213. +        int scan = tty->state & TS_ESC;
  214. +
  215. +        if (scan && (tty->xkey ? tty->xkey[scan] : vt52xkey[scan]))
  216. +            r = 1;
  217. +    }
  218.      return r;
  219.  }
  220.  
  221. Index: dosfile.c
  222. @@ -8,6 +8,8 @@
  223.  
  224.  #include "mint.h"
  225.  
  226. +extern char vt52xkey[];
  227. +
  228.  static long do_dup P_((int,int));
  229.  static void unselectme P_((PROC *));
  230.  
  231. @@ -928,6 +930,14 @@
  232.          r = (*f->dev->ioctl)(f, cmd, (void *)arg);
  233.          if (r == EINVFN && is_terminal(f)) {
  234.              r = tty_ioctl(f, cmd, (void *)arg);
  235. +        } else if (cmd == FIONREAD && !r && !(*(long *)arg) &&
  236. +                is_terminal(f)) {
  237. +            struct tty *tty = (struct tty *)f->devinfo;
  238. +            int scan = tty->state & TS_ESC;
  239. +
  240. +            if (scan && (tty->xkey ? tty->xkey[scan] :
  241. +                    vt52xkey[scan]))
  242. +                *(long *)arg = 1;
  243.          }
  244.          return r;
  245.      }
  246. @@ -1010,8 +1020,15 @@
  247.  
  248.      for (i = 0; i < MAX_OPEN; i++) {
  249.          if (rfd & mask) {
  250. +            struct tty *tty;
  251. +            int scan;
  252. +
  253.              f = p->handle[i];
  254. -            if ((*f->dev->select)(f, (long)p, O_RDONLY) == 1) {
  255. +            if ((*f->dev->select)(f, (long)p, O_RDONLY) == 1 ||
  256. +                (is_terminal(f) &&
  257. +                (scan = (tty=(struct tty *)f->devinfo)->state & TS_ESC) &&
  258. +                (tty->xkey ? tty->xkey[scan] :
  259. +                    vt52xkey[scan]))) {
  260.                  count++;
  261.                  *rfdp |= mask;
  262.              }
  263. Index: tty.c
  264. @@ -233,7 +233,7 @@
  265.  
  266.  /* for RAW mode, if there are no more characters then break */
  267.          if ( (mode & (T_RAW|T_CBREAK)) &&
  268. -            !((rdmode & ESCSEQ) && (tty->state & TS_ESC))) {
  269. +            !(tty->state & TS_ESC)) {
  270.              r = 1;
  271.              (void)(*f->dev->ioctl)(f, FIONREAD, &r);
  272.              if (r <= 0) break;
  273. @@ -375,7 +375,7 @@
  274.   *        28-31 are shift+cursor up, down, right, and left
  275.   */
  276.  
  277. -static char vt52xkey[256] = {
  278. +char vt52xkey[256] = {
  279.  '\033', 'P', 0, 0, 0, 0, 0, 0,
  280.  '\033', 'Q', 0, 0, 0, 0, 0, 0,
  281.  '\033', 'R', 0, 0, 0, 0, 0, 0,
  282. @@ -665,19 +665,15 @@
  283.  /* we may be in the middle of an escape sequence */
  284.      scan = (tty->state & TS_ESC);
  285.      if (scan != 0) {
  286. -        if (mode & ESCSEQ) {
  287. -            tab = tty->xkey ? tty->xkey : vt52xkey;
  288. -            r = (unsigned char) tab[scan++];
  289. -            if (r) {
  290. -                c = UNDEF;
  291. -                if (tab[scan] == 0) scan = 0;
  292. -            }
  293. -            else
  294. -                scan = 0;
  295. -            tty->state = (tty->state & ~TS_ESC) | scan;
  296. +        tab = tty->xkey ? tty->xkey : vt52xkey;
  297. +        r = (unsigned char) tab[scan++];
  298. +        if (r) {
  299. +            c = UNDEF;
  300. +            if (tab[scan] == 0) scan = 0;
  301.          }
  302.          else
  303. -            tty->state &= ~TS_ESC;
  304. +            scan = 0;
  305. +        tty->state = (tty->state & ~TS_ESC) | scan;
  306.      }
  307.  
  308.      while (c != UNDEF) {
  309.  
  310.  ok happy patching...
  311.     Juergen
  312.  
  313. PS:  i got a few mysterious crashes and once even saw a `kfree: memory
  314. not allocated by kmalloc' panic...  went something wrong with the nalloc
  315. fixes?  because my patched 1.09 never did that since...
  316.  
  317. util.c: ++schwab@ls5.informatik.uni-dortmund.de
  318.     In kmalloc(), the size passed to nalloc_add_arena() was wrong.
  319.  
  320. nalloc2.c: ++nox@jelal.north.de
  321.     Fixed the code for figuring out when to free an arena (it didn't
  322.     use to take account of the arena size itself).
  323.  
  324. PPS: yuo may get a few offsets, they are ok.
  325. -- 
  326. J"urgen Lock / nox@jelal.north.de / UUCP: ..!uunet!unido!uniol!jelal!nox
  327.                                 ...ohne Gewehr
  328. PGP public key fingerprint =  8A 18 58 54 03 7B FC 12  1F 8B 63 C7 19 27 CF DA 
  329.